﻿namespace FSpec.Runner.Model

open Gallio.Model
open FSpec.Runner

type Context(name, codeElement) as this =
    inherit Tree.Test(name, codeElement)
        do
            codeElement |> insertXmlDocsInto this
            
            this.Kind <- "Context"
            this.IsTestCase <- false
            this.Metadata.SetValue(MetadataKeys.Framework, StringResources.FrameWorkName)
            this.Metadata.SetValue(MetadataKeys.Category, "Contexts")

    

